home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / comm / fido / rfs191a.lha / scripts / RFHload
AmigaDOS Script File  |  1994-07-18  |  313b  |  16 lines

  1. .key wplbase/a,line/a
  2. .bra [
  3. .ket ]
  4. Rx "exit show('p',RFH[line])"
  5. if ${RC} NOT EQ 0
  6.     Echo "Closing RFH[line]"
  7.     rx "Address RFH[line] RFHEXIT"
  8.     wait 5 SEC
  9. endif
  10. Echo "Loading RFH Port:RFH[line]"
  11. IF EXISTS "RPDIR:RFH" 
  12. run >NIL: RFH [wplbase] [line]
  13. ELSE 
  14. run >NIL: Rx mail:rexx/RFH [wplbase] [line]
  15. ENDIF
  16.